COM AT^STLN test - T9 language selection
COM V1.0	28.01.2005	T. Kleinmann	Started
COM V1.1	22.02.2005	T. Kleinmann	changed ToDo: Language index parameters have to be found out
COM V1.2        18.07.2005	T. Kleinmann	added Language index parameters
##########################################################################################
#ToDo(S3): Check returned actions and indexes from test command
#ToDo(S3): Check which language index parameter is to be used
##########################################################################################

from attglobals import *

##########################################################################################

COM Test command
AT^STLN=?
WAITFOR (1,'^STLN')

##########################################################################################

COM Read command
AT^STLN?
WAITFOR (1,'^STLN: ')

##########################################################################################

COM Write command 

COM	1	Enable T9 input language
AT^STLN = 1
WAIT FOR OK

AT^STLN?
WAITFOR (1,'1')

COM 	0	Disable T9 input language
AT^STLN = 0
WAIT FOR OK

AT^STLN?
WAITFOR (1,'0')
##########################################################################################


COM Write command with index parameter 1

COM	1	Enable T9 input language
AT^STLN = 1,1
WAIT FOR OK

l_index=[0,1,2,3,4,5,6,7,11,16,17,20,25]

for i in l_index:
	ATCMD(1,'AT^STLN=1,',i)
	WAIT FOR OK

AT^STLN?
WAITFOR (1,'1')

COM 	0	Disable T9 input language
AT^STLN = 0,1
WAIT FOR OK

AT^STLN?
WAITFOR (1,'0')
##########################################################################################